home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48hor1
/
spline
< prev
next >
Wrap
Text File
|
1995-03-31
|
2KB
|
2 lines
HPHP48-E -àa#,*° SPLINE V2.0
É¢BX 2£R- G£R- \£R- q£R- ~A.r, ë!3*aç¡ï" -Dx# -p, T6 ä D1y6 v 7òù 2£B' +1P'y" ûAe#H. @$ g#aç z# -p4*tâ± Ö/r, ëᢠ! Råæövç bÆ vv 9£± Ö/ ½ +1P'y"~A.r, ëÑ1* ê¡ï"t*@+*'¢² µ/òù \£B' +1P'y"~A. â ëA+*aç¡ï" - â b¢r Dü± µ/òù ½ûáà +1P'y"~A.r, ëA+* ê¡ï" - 7*tâq, ,Éá; +1P'y" û ,* A +1@ +1@+*'¢B+*'¢B+*'¢B+*'¢B+*'¢B+*'¢ L#m. àÖæ km. █xæ ym. █Öæ m. Pûæ sm. @Öæ mm. Öæ bm. ` óæ µnm.00 óæ s1n 62ì"q£ R ú.òù É¢òæ n 1òæ j ÉAe#m. g#K Be#m. █ g#K â$#+1Pû" -°÷ 3/4£1x T6òæ yy6òì {ï ½ )ü D m. °Vδ '¢òæ k 1òæ j ûÑæ jî1/* üq ó¢ í L22¿ m. à6x T6òæ xy6òì +1P'y"3/4£Ae#m.00 ~a g#í Be#m.00 g#í òæ x3/4£ ,*m. ° #m. â Ñæ nDüá$#φûÑæ k ÇAe#m. █ g#í ,*m. ° #m. Öæ ym. v ó¢ í Æx D (c)Ñæ hm. f| ─á$#m. °6x T6òæ sy6òì ~A.â5* ~A¡ï" - ,*T6òæ 0y6òì É¢Be#m. Pë g#í òæ sÉ¢b| m.00 D m. █ ,*ÆxQδ 2£âb +1Pû"'¢R'y"É¢òæ nb¢ D 1òæ jm. 0xæ jÇφ1/*Düa| Q m. █Öæ jÇφ1/*Düa| g«Qδ 2£âb L22ì"\£ J ú.òù m.00 ~aÖæ sm. °f| Ñæ hm. °f| ─!3*î± µ/B+*Ö/òæ n ÇAe#m. @ g#í òæ h{ï ,* ,*½û #m. v, ó¢¢É g«Qδ m. ° í L2 ½ m. àæ-* 1x T6òæ y6òì m. `1÷ É¢ò» 1òæ j (c) ,*g«Ñæ nb¢ D µüá$#m. àæ-* 1x T6òæ µy6òì m. àÆ- b¢âb b¢òæ k 1òæ jm. v, É¢ D b¢2x m. Pûæ jÉ¢ D Æxq@ m. v, É¢r b¢2x m. `ùæ jÉ¢ D Æxq@ L2â-*m. ` s@ m. àfB É¢ D m. Pëv@ x²Ñæ d{ï îAe#m. D g#í ,*m. ° #m. Öæ mm. v ó¢ í Æx D m. █Öæ jÆxáb 2£Rδ m. 0xæ jÆxq L2òæ k ÇAe#m. g#í ,*m. ° #m. Öæ ym. f| m. DÖæ jÆxÑæ hm. f| &'áb 2£Rδ á$#m. °6x T6òæ by6òì 7òù 2£ J 7òù É¢òæ k 1òæ jm. DÖæ jÉ¢r ÆxAe#H. █ g#m. █xæ jÆx D &'áb m. DÖæ jÆxÑæ xm. ,*g«a| T6 ä Xy6 D &'áb Ñæ hm. f| ─á-* ─Ñæ am. f| g«á$#+1P'y"G£ J 7òù É¢òæ k 1òæ jm. DÖæ jÆxÑæ xm. ,*g«a| T6 ä Xy6 D îÑæ mm. ,*g«a| T6 ä Xy6òæ xm. f| áb g«Ñæ hm. f| ─á$#+1P'y"É¢òæ k 1òæ jm. DÖæ jÆxÑæ xm. ,*g«a| T6 ä Xy6 D ó¢ò îÑæ mm. ,*g«a| T6 ä Xy6òæ xm. f| 1/*-°áb g«Ñæ hm. f| ─!3* ─Ñæ am. f| T6 ä Xy6òæ xm. f| áb g«Ñæ bm. f| g«á$#+1P'y",* « X«CASE m. à í m. °æ-* 1òæ jT6 ä Xy6⢠r m. █xæ jÆxq ,*P THEN g«Ñ» g«á¢ RäD r m. í £ 8#,*° END EVAL»»É¢òæ n 1òæ jg«á$#{ïá_#96²